home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 4 (Reseller) / Apple Ref. & Pres. Lib.v4.0.iso / 4-Demos / Third Party Demos / DTMedia / Aldus Persuasion / INTERACTIVE / INTERACTIVE.rsrc / TEXT_1157.txt < prev    next >
Text File  |  1988-11-03  |  148b  |  6 lines
  1. ä#
  2. if &A = 0 then exit
  3. set &H = mouseh - &S
  4. set &D = spriteh[10]
  5. set spriteh[14] = constrainh(13, &H)
  6. set spritev[14] = constrainv(13, &V) √ÑÀá¬∂